/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / COMALTUTOR1.SDA / LESSON FOUR

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| e0 0b e9 0c 6a 0e 00 0a | 1b 00 20 44 45 4c 45 54 |....j...|.. DELET|
|00000010| 45 20 22 30 3a 4c 45 53 | 53 4f 4e 20 46 4f 55 52 |E "0:LES|SON FOUR|
|00000020| 22 00 14 16 00 20 53 48 | 49 47 4c 45 59 20 54 55 |".... SH|IGLEY TU|
|00000030| 54 4f 52 49 41 4c 53 00 | 1e 1b 00 20 53 41 56 45 |TORIALS.|... SAVE|
|00000040| 20 20 20 22 30 3a 4c 45 | 53 53 4f 4e 20 46 4f 55 |   "0:LE|SSON FOU|
|00000050| 52 22 00 28 06 7f 11 81 | 00 32 06 7f 12 81 00 3c |R".(....|.2.....<|
|00000060| 06 7f 15 81 00 46 06 7f | 16 81 00 50 06 7f 1f 81 |.....F..|...P....|
|00000070| 00 5a 06 7f 1a 81 00 64 | 04 00 00 6e 09 70 11 43 |.Z.....d|...n.p.C|
|00000080| 8a 00 7b 00 78 0b 5f 02 | 00 8e 4b 65 60 61 00 82 |..{.x._.|..Ke`a..|
|00000090| 0c 8c 8f 0c 00 02 00 0a | 93 c5 00 8c 06 7f 13 81 |........|........|
|000000a0| 00 96 0a ff 46 02 00 00 | ff 47 00 a0 0a ff 1e 02 |....F...|.G......|
|000000b0| 00 0c ff 1f 00 aa 11 5f | 03 08 4c 45 53 53 4f 4e |......._|..LESSON|
|000000c0| 20 34 65 60 61 00 b4 24 | 5f 03 1b 41 53 53 49 47 | 4e`a..$|_..ASSIG|
|000000d0| 4e 4d 45 4e 54 53 20 41 | 4e 44 20 45 58 50 52 45 |NMENTS A|ND EXPRE|
|000000e0| 53 53 49 4f 4e 53 65 60 | 61 00 be 06 7f 10 81 00 |SSIONSe`|a.......|
|000000f0| c8 05 7d 11 00 d2 04 00 | 00 dc 09 70 13 60 8a 00 |..}.....|...p.`..|
|00000100| 7b 00 e6 0b 5f 02 00 93 | 4b 65 66 61 00 f0 05 7d |{..._...|Kefa...}|
|00000110| 13 00 fa 04 00 01 04 09 | 70 10 24 8b 00 7c 01 0e |........|p.$..|..|
|00000120| 06 5f 60 61 01 18 09 07 | 0d 02 02 8d 3a 01 22 0b |._`a....|....:.".|
|00000130| 97 04 0d d8 37 98 fc 8a | 01 2c 16 5f 03 0d 1c 50 |....7...|.,._...P|
|00000140| 52 45 53 53 20 53 48 49 | 46 54 91 65 60 61 01 36 |RESS SHI|FT.e`a.6|
|00000150| 15 5f 03 0c 20 20 20 20 | 20 20 20 20 20 20 20 91 |._..    |       .|
|00000160| 65 60 61 01 40 06 9b a5 | 8a 01 4a 0a ff 1e 02 00 |e`a.@...|..J.....|
|00000170| 0c ff 1f 01 54 12 82 05 | 10 00 02 00 01 84 02 01 |....T...|........|
|00000180| 2c 85 88 f4 89 01 5e 06 | 7f 13 81 01 68 0d 97 f9 |,.....^.|....h...|
|00000190| 02 00 00 4b 31 99 f4 9a | 01 72 05 7d 10 01 7c 04 |...K1...|.r.}..|.|
|000001a0| 00 01 86 09 70 1a 42 8b | 00 7b 01 90 0c d2 03 04 |....p.B.|.{......|
|000001b0| 4d 45 4e 55 d4 d3 01 9a | 05 7d 1a 01 a4 04 00 01 |MENU....|.}......|
|000001c0| ae 09 70 12 ba 8c 00 7b | 01 b8 2e 5f 03 25 4c 45 |..p....{|..._.%LE|
|000001d0| 54 27 53 20 42 45 47 49 | 4e 20 57 49 54 48 20 41 |T'S BEGI|N WITH A|
|000001e0| 4e 20 45 58 41 4d 50 4c | 45 20 41 53 20 55 53 55 |N EXAMPL|E AS USU|
|000001f0| 41 4c 3a 65 60 61 01 c2 | 06 5f 60 61 01 cc 06 7f |AL:e`a..|._`a....|
|00000200| 35 81 01 d6 2e 5f 03 25 | 11 54 48 45 20 41 53 53 |5...._.%|.THE ASS|
|00000210| 49 47 4e 4d 45 4e 54 20 | 53 54 41 54 45 4d 45 4e |IGNMENT |STATEMEN|
|00000220| 54 20 49 53 20 54 48 45 | 20 4f 4e 45 20 65 60 61 |T IS THE| ONE e`a|
|00000230| 01 e0 31 5f 03 28 11 54 | 48 41 54 20 41 55 54 4f |..1_.(.T|HAT AUTO|
|00000240| 4d 41 54 49 43 41 4c 4c | 59 20 44 4f 45 53 20 54 |MATICALL|Y DOES T|
|00000250| 48 45 20 4d 41 54 48 45 | 4d 41 54 49 43 53 65 60 |HE MATHE|MATICSe`|
|00000260| 61 01 ea 31 5f 03 28 11 | 46 4f 52 20 59 4f 55 20 |a..1_.(.|FOR YOU |
|00000270| 41 4e 44 20 41 53 53 49 | 47 4e 53 20 54 48 45 20 |AND ASSI|GNS THE |
|00000280| 52 45 53 55 4c 54 53 20 | 54 4f 20 53 4f 4d 45 65 |RESULTS |TO SOMEe|
|00000290| 60 61 01 f4 30 5f 03 27 | 11 56 41 52 49 41 42 4c |`a..0_.'|.VARIABL|
|000002a0| 45 2e 20 20 49 4e 20 54 | 48 49 53 20 43 41 53 45 |E.  IN T|HIS CASE|
|000002b0| 20 54 52 49 50 27 43 4f | 53 54 20 57 49 4c 4c 65 | TRIP'CO|ST WILLe|
|000002c0| 60 61 01 fe 2e 5f 03 25 | 11 48 4f 4c 44 20 54 48 |`a..._.%|.HOLD TH|
|000002d0| 45 20 52 45 53 55 4c 54 | 20 4f 46 20 4f 55 52 20 |E RESULT| OF OUR |
|000002e0| 43 41 4c 43 55 4c 41 54 | 49 4f 4e 53 2e 65 60 61 |CALCULAT|IONS.e`a|
|000002f0| 02 08 06 7f 10 81 02 12 | 22 5f 03 19 4c 49 53 54 |........|"_..LIST|
|00000300| 20 54 48 45 20 50 52 4f | 47 52 41 4d 20 41 47 41 | THE PRO|GRAM AGA|
|00000310| 49 4e 2e 2e 2e 65 60 61 | 02 1c 06 7f 31 81 02 26 |IN...e`a|....1..&|
|00000320| 06 7f 35 81 02 30 05 7d | 12 02 3a 04 00 02 44 09 |..5..0.}|..:...D.|
|00000330| 70 15 2d 8f 00 7b 02 4e | 2b 5f 03 22 54 48 45 20 |p.-..{.N|+_."THE |
|00000340| 41 53 53 49 47 4e 4d 45 | 4e 54 20 53 54 41 54 45 |ASSIGNME|NT STATE|
|00000350| 4d 45 4e 54 20 54 45 4c | 4c 53 20 54 48 45 65 60 |MENT TEL|LS THEe`|
|00000360| 61 02 58 2b 5f 03 22 11 | 43 4f 4d 50 55 54 45 52 |a.X+_.".|COMPUTER|
|00000370| 20 54 4f 20 44 4f 20 57 | 48 41 54 45 56 45 52 20 | TO DO W|HATEVER |
|00000380| 49 53 20 4f 4e 20 54 48 | 45 65 60 61 02 62 2d 5f |IS ON TH|Ee`a.b-_|
|00000390| 03 24 11 52 49 47 48 54 | 20 53 49 44 45 20 4f 46 |.$.RIGHT| SIDE OF|
|000003a0| 20 54 48 45 20 28 3a 3d | 29 20 41 4e 44 20 53 54 | THE (:=|) AND ST|
|000003b0| 4f 52 45 20 49 54 65 60 | 61 02 6c 2d 5f 03 24 11 |ORE ITe`|a.l-_.$.|
|000003c0| 49 4e 20 54 48 45 20 56 | 41 52 49 41 42 4c 45 20 |IN THE V|ARIABLE |
|000003d0| 54 48 41 54 20 41 50 50 | 45 41 52 53 20 4f 4e 20 |THAT APP|EARS ON |
|000003e0| 54 48 45 65 60 61 02 76 | 2f 5f 03 26 11 4c 45 46 |THEe`a.v|/_.&.LEF|
|000003f0| 54 20 53 49 44 45 2e 20 | 20 53 49 4e 43 45 20 57 |T SIDE. | SINCE W|
|00000400| 45 20 57 41 4e 54 20 54 | 48 45 20 52 45 53 55 4c |E WANT T|HE RESUL|
|00000410| 54 53 65 60 61 02 80 2c | 5f 03 23 11 53 54 4f 52 |TSe`a..,|_.#.STOR|
|00000420| 45 44 20 49 4e 20 54 52 | 49 50 27 43 4f 53 54 2c |ED IN TR|IP'COST,|
|00000430| 20 57 45 20 50 4c 41 43 | 45 20 54 48 49 53 65 60 | WE PLAC|E THISe`|
|00000440| 61 02 8a 1f 5f 03 16 11 | 56 41 52 49 41 42 4c 45 |a..._...|VARIABLE|
|00000450| 20 4f 4e 20 54 48 45 20 | 4c 45 46 54 2e 65 60 61 | ON THE |LEFT.e`a|
|00000460| 02 94 06 7f 10 81 02 9e | 24 5f 03 1b 4c 49 53 54 |........|$_..LIST|
|00000470| 20 54 48 45 20 50 52 4f | 47 52 41 4d 20 4f 4e 43 | THE PRO|GRAM ONC|
|00000480| 45 20 4d 4f 52 45 2e 65 | 60 61 02 a8 06 7f 31 81 |E MORE.e|`a....1.|
|00000490| 02 b2 06 7f 35 81 02 bc | 26 5f 03 1d 4f 2e 4b 2e |....5...|&_..O.K.|
|000004a0| 20 4c 45 54 27 53 20 52 | 55 4e 20 54 48 45 20 50 | LET'S R|UN THE P|
|000004b0| 52 4f 47 52 41 4d 2e 2e | 2e 65 60 61 02 c6 06 7f |ROGRAM..|.e`a....|
|000004c0| 30 81 02 d0 0a ff 1e 02 | 00 0e ff 1f 02 da 23 5f |0.......|......#_|
|000004d0| 03 1a 54 48 49 53 20 43 | 41 4c 43 55 4c 41 54 45 |..THIS C|ALCULATE|
|000004e0| 53 20 54 52 49 50 20 43 | 4f 53 54 2e 65 60 61 02 |S TRIP C|OST.e`a.|
|000004f0| e4 20 b5 03 15 45 4e 54 | 45 52 20 54 4f 54 41 4c |. ...ENT|ER TOTAL|
|00000500| 20 44 49 53 54 41 4e 43 | 45 3a b7 07 2a b8 bb 02 | DISTANC|E:..*...|
|00000510| ee 23 b5 03 18 45 4e 54 | 45 52 20 55 53 55 41 4c |.#...ENT|ER USUAL|
|00000520| 20 47 41 53 20 4d 49 4c | 45 41 47 45 3a b7 07 2b | GAS MIL|EAGE:..+|
|00000530| b8 bb 02 f8 21 b5 03 16 | 45 4e 54 45 52 20 43 4f |....!...|ENTER CO|
|00000540| 53 54 20 50 45 52 20 47 | 41 4c 4c 4f 4e 3a b7 07 |ST PER G|ALLON:..|
|00000550| 2c b8 bb 03 02 0e 07 2d | 04 2a 04 2b 23 04 2c 24 |,......-|.*.+#.,$|
|00000560| 3a 03 0c 1a 5f 03 0d 54 | 52 49 50 20 43 4f 53 54 |:..._..T|RIP COST|
|00000570| 20 3d 20 24 65 66 04 2d | 64 60 61 03 16 06 7f 10 | = $ef.-|d`a.....|
|00000580| 81 03 20 05 7d 15 03 2a | 04 00 03 34 09 70 16 60 |.. .}..*|...4.p.`|
|00000590| 91 00 7b 03 3e 2f 5f 03 | 26 54 48 45 20 41 53 53 |..{.>/_.|&THE ASS|
|000005a0| 49 47 4e 4d 45 4e 54 20 | 4f 50 45 52 41 54 4f 52 |IGNMENT |OPERATOR|
|000005b0| 20 28 3a 3d 29 20 53 45 | 50 41 52 41 54 45 53 65 | (:=) SE|PARATESe|
|000005c0| 60 61 03 48 2c 5f 03 23 | 11 57 48 41 54 20 54 48 |`a.H,_.#|.WHAT TH|
|000005d0| 45 20 43 4f 4d 50 55 54 | 45 52 20 4d 55 53 54 20 |E COMPUT|ER MUST |
|000005e0| 44 4f 20 41 4e 44 20 57 | 48 41 54 65 60 61 03 52 |DO AND W|HATe`a.R|
|000005f0| 2f 5f 03 26 11 56 41 52 | 49 41 42 4c 45 20 57 49 |/_.&.VAR|IABLE WI|
|00000600| 4c 4c 20 42 45 20 55 53 | 45 44 20 46 4f 52 20 53 |LL BE US|ED FOR S|
|00000610| 54 4f 52 49 4e 47 20 54 | 48 45 65 60 61 03 5c 2d |TORING T|HEe`a.\-|
|00000620| 5f 03 24 11 52 45 53 55 | 4c 54 53 20 4f 46 20 54 |_.$.RESU|LTS OF T|
|00000630| 48 45 20 43 41 4c 43 55 | 4c 41 54 49 4f 4e 2e 20 |HE CALCU|LATION. |
|00000640| 20 4e 4f 54 49 43 45 65 | 60 61 03 66 2c 5f 03 23 | NOTICEe|`a.f,_.#|
|00000650| 11 54 48 41 54 20 3a 3d | 20 49 53 20 4e 4f 54 20 |.THAT :=| IS NOT |
|00000660| 54 48 45 20 53 41 4d 45 | 20 41 53 20 3d 20 57 48 |THE SAME| AS = WH|
|00000670| 49 43 48 65 60 61 03 70 | 2e 5f 03 25 11 4d 45 41 |ICHe`a.p|._.%.MEA|
|00000680| 4e 53 20 27 45 51 55 41 | 4c 20 54 4f 2e 27 20 20 |NS 'EQUA|L TO.'  |
|00000690| 54 48 49 53 20 4e 45 58 | 54 20 50 52 4f 47 52 41 |THIS NEX|T PROGRA|
|000006a0| 4d 65 60 61 03 7a 24 5f | 03 1b 11 49 4c 4c 55 53 |Me`a.z$_|...ILLUS|
|000006b0| 54 52 41 54 45 53 20 54 | 48 45 20 50 52 49 4e 43 |TRATES T|HE PRINC|
|000006c0| 49 50 4c 45 2e 65 60 61 | 03 84 06 5f 60 61 03 8e |IPLE.e`a|..._`a..|
|000006d0| 0a ff 1e 02 00 0e ff 1f | 03 98 10 5f 03 07 41 47 |........|..._..AG|
|000006e0| 45 3a 3d 31 35 65 60 61 | 03 a2 1f 5f 03 16 50 52 |E:=15e`a|..._..PR|
|000006f0| 49 4e 54 20 22 41 47 45 | 20 49 53 20 4e 4f 57 22 |INT "AGE| IS NOW"|
|00000700| 3b 41 47 45 65 60 61 03 | ac 15 5f 03 0c 41 47 45 |;AGEe`a.|.._..AGE|
|00000710| 3a 3d 41 47 45 20 2b 20 | 31 65 60 61 03 b6 1f 5f |:=AGE + |1e`a..._|
|00000720| 03 16 50 52 49 4e 54 20 | 22 41 47 45 20 49 53 20 |..PRINT |"AGE IS |
|00000730| 4e 4f 57 22 3b 41 47 45 | 65 60 61 03 c0 06 7f 30 |NOW";AGE|e`a....0|
|00000740| 81 03 ca 0a ff 1e 02 00 | 0e ff 1f 03 d4 09 07 2f |........|......./|
|00000750| 02 00 0f 3a 03 de 17 5f | 03 0a 41 47 45 20 49 53 |...:..._|..AGE IS|
|00000760| 20 4e 4f 57 65 67 04 2f | 64 60 61 03 e8 0c 07 2f | NOWeg./|d`a..../|
|00000770| 04 2f 02 00 01 27 3a 03 | f2 17 5f 03 0a 41 47 45 |./...':.|.._..AGE|
|00000780| 20 49 53 20 4e 4f 57 65 | 67 04 2f 64 60 61 03 fc | IS NOWe|g./d`a..|
|00000790| 06 7f 10 81 04 06 05 7d | 16 04 10 04 00 04 1a 09 |.......}|........|
|000007a0| 70 1f ce 93 00 7b 04 24 | 0b 5f 02 00 0e 4b 65 60 |p....{.$|._...Ke`|
|000007b0| 61 04 2e 10 5f 03 07 d3 | d5 cd cd c1 d2 d9 65 60 |a..._...|......e`|
|000007c0| 61 04 38 06 5f 60 61 04 | 42 0a ff 1e 02 00 04 ff |a.8._`a.|B.......|
|000007d0| 1f 04 4c 2e 5f 03 25 31 | 2e 20 20 d4 48 45 20 41 |..L._.%1|.  .HE A|
|000007e0| 53 53 49 47 4e 4d 45 4e | 54 20 53 54 41 54 45 4d |SSIGNMEN|T STATEM|
|000007f0| 45 4e 54 20 4c 45 54 53 | 20 54 48 45 65 60 61 04 |ENT LETS| THEe`a.|
|00000800| 56 2c 5f 03 23 43 4f 4d | 50 55 54 45 52 20 43 41 |V,_.#COM|PUTER CA|
|00000810| 4c 43 55 4c 41 54 45 20 | 56 41 4c 55 45 53 20 41 |LCULATE |VALUES A|
|00000820| 4e 44 20 53 54 4f 52 45 | 65 60 61 04 60 1b 5f 03 |ND STORE|e`a.`._.|
|00000830| 12 54 48 45 4d 20 49 4e | 20 56 41 52 49 41 42 4c |.THEM IN| VARIABL|
|00000840| 45 53 2e 65 60 61 04 6a | 2e 5f 03 25 11 32 2e 20 |ES.e`a.j|._.%.2. |
|00000850| 20 d4 48 45 20 56 41 52 | 49 41 42 4c 45 20 41 50 | .HE VAR|IABLE AP|
|00000860| 50 45 41 52 53 20 4f 4e | 20 54 48 45 20 4c 45 46 |PEARS ON| THE LEF|
|00000870| 54 65 60 61 04 74 2d 5f | 03 24 53 49 44 45 20 4f |Te`a.t-_|.$SIDE O|
|00000880| 46 20 54 48 45 20 41 53 | 53 49 47 4e 4d 45 4e 54 |F THE AS|SIGNMENT|
|00000890| 20 4f 50 45 52 41 54 4f | 52 20 28 3a 3d 29 65 60 | OPERATO|R (:=)e`|
|000008a0| 61 04 7e 30 5f 03 27 41 | 4e 44 20 57 48 41 54 20 |a.~0_.'A|ND WHAT |
|000008b0| 54 48 45 20 43 4f 4d 50 | 55 54 45 52 20 48 41 53 |THE COMP|UTER HAS|
|000008c0| 20 54 4f 20 44 4f 20 54 | 4f 20 46 49 4e 44 65 60 | TO DO T|O FINDe`|
|000008d0| 61 04 88 2f 5f 03 26 54 | 48 49 53 20 56 41 4c 55 |a../_.&T|HIS VALU|
|000008e0| 45 20 49 53 20 50 4c 41 | 43 45 44 20 4f 4e 20 54 |E IS PLA|CED ON T|
|000008f0| 48 45 20 52 49 47 48 54 | 20 53 49 44 45 65 60 61 |HE RIGHT| SIDEe`a|
|00000900| 04 92 24 5f 03 1b 4f 46 | 20 54 48 45 20 41 53 53 |..$_..OF| THE ASS|
|00000910| 49 47 4e 4d 45 4e 54 20 | 4f 50 45 52 41 54 4f 52 |IGNMENT |OPERATOR|
|00000920| 2e 65 60 61 04 9c 30 5f | 03 27 11 33 2e 20 20 d4 |.e`a..0_|.'.3.  .|
|00000930| 48 45 20 41 53 53 49 47 | 4e 4d 45 4e 54 20 4f 50 |HE ASSIG|NMENT OP|
|00000940| 45 52 41 54 4f 52 20 49 | 53 20 4e 4f 54 20 54 48 |ERATOR I|S NOT TH|
|00000950| 45 65 60 61 04 a6 2e 5f | 03 25 53 41 4d 45 20 41 |Ee`a..._|.%SAME A|
|00000960| 53 20 54 48 45 20 27 45 | 51 55 41 4c 53 27 20 53 |S THE 'E|QUALS' S|
|00000970| 49 47 4e 2e 20 20 c9 54 | 20 4d 45 52 45 4c 59 65 |IGN.  .T| MERELYe|
|00000980| 60 61 04 b0 2b 5f 03 22 | 43 48 41 4e 47 45 53 20 |`a..+_."|CHANGES |
|00000990| 54 48 45 20 56 41 4c 55 | 45 20 4f 46 20 41 20 56 |THE VALU|E OF A V|
|000009a0| 41 52 49 41 42 4c 45 20 | 4f 52 65 60 61 04 ba 22 |ARIABLE |ORe`a.."|
|000009b0| 5f 03 19 41 4c 54 45 52 | 53 20 49 54 53 20 43 55 |_..ALTER|S ITS CU|
|000009c0| 52 52 45 4e 54 20 56 41 | 4c 55 45 2e 65 60 61 04 |RRENT VA|LUE.e`a.|
|000009d0| c4 06 7f 10 81 04 ce 0a | ff 1e 02 00 07 ff 1f 04 |........|........|
|000009e0| d8 23 5f 03 1a d4 48 49 | 53 20 43 4f 4e 43 4c 55 |.#_...HI|S CONCLU|
|000009f0| 44 45 53 20 4c 45 53 53 | 4f 4e 20 46 4f 55 52 65 |DES LESS|ON FOURe|
|00000a00| 60 61 04 e2 05 7d 1f 04 | ec 04 00 04 f6 09 70 30 |`a...}..|......p0|
|00000a10| 27 94 00 7b 05 00 06 5f | 60 61 05 0a 04 95 05 14 |'..{..._|`a......|
|00000a20| 21 b5 03 16 9e 45 4e 54 | 45 52 20 52 55 4e 20 43 |!....ENT|ER RUN C|
|00000a30| 4f 4d 4d 41 4e 44 20 2d | 2d 3e b7 09 0c ba bb 05 |OMMAND -|->......|
|00000a40| 1e 0f da 06 0c 03 03 52 | 55 4e 2d 96 e6 93 05 28 |.......R|UN-....(|
|00000a50| 06 5f 60 61 05 32 05 7d | 30 05 3c 04 00 05 46 09 |._`a.2.}|0.<...F.|
|00000a60| 70 31 7d 94 00 7b 05 50 | 06 5f 60 61 05 5a 04 95 |p1}..{.P|._`a.Z..|
|00000a70| 05 64 22 b5 03 17 9e 45 | 4e 54 45 52 20 4c 49 53 |.d"....E|NTER LIS|
|00000a80| 54 20 43 4f 4d 4d 41 4e | 44 20 2d 2d 3e b7 09 0c |T COMMAN|D -->...|
|00000a90| ba bb 05 6e 10 da 06 0c | 03 04 4c 49 53 54 2d 96 |...n....|..LIST-.|
|00000aa0| 39 94 05 78 06 5f 60 61 | 05 82 05 7d 31 05 8c 04 |9..x._`a|...}1...|
|00000ab0| 00 05 96 09 70 35 b6 95 | 00 7b 05 a0 0a ff 1e 02 |....p5..|.{......|
|00000ac0| 00 0e ff 1f 05 aa 2b 5f | 03 22 50 52 49 4e 54 20 |......+_|."PRINT |
|00000ad0| 22 54 48 49 53 20 43 41 | 4c 43 55 4c 41 54 45 53 |"THIS CA|LCULATES|
|00000ae0| 20 54 52 49 50 20 43 4f | 53 54 2e 22 65 60 61 05 | TRIP CO|ST."e`a.|
|00000af0| b4 29 5f 03 20 49 4e 50 | 55 54 20 22 45 4e 54 45 |.)_. INP|UT "ENTE|
|00000b00| 52 20 44 49 53 54 41 4e | 43 45 3a 22 3a 44 49 53 |R DISTAN|CE:":DIS|
|00000b10| 54 41 4e 43 45 65 60 61 | 05 be 31 5f 03 28 49 4e |TANCEe`a|..1_.(IN|
|00000b20| 50 55 54 20 22 45 4e 54 | 45 52 20 55 53 55 41 4c |PUT "ENT|ER USUAL|
|00000b30| 20 47 41 53 20 4d 49 4c | 45 41 47 45 3a 22 3a 4d | GAS MIL|EAGE:":M|
|00000b40| 49 4c 45 41 47 45 65 60 | 61 05 c8 31 5f 03 28 91 |ILEAGEe`|a..1_.(.|
|00000b50| 49 4e 50 55 54 20 22 45 | 4e 54 45 52 20 43 4f 53 |INPUT "E|NTER COS|
|00000b60| 54 20 50 45 52 20 47 41 | 4c 4c 4f 4e 3a 22 3a 47 |T PER GA|LLON:":G|
|00000b70| 41 4c 27 43 4f 53 54 65 | 60 61 05 d2 2f 5f 03 26 |AL'COSTe|`a../_.&|
|00000b80| 54 52 49 50 27 43 4f 53 | 54 3a 3d 44 49 53 54 41 |TRIP'COS|T:=DISTA|
|00000b90| 4e 43 45 2f 4d 49 4c 45 | 41 47 45 20 2a 20 47 41 |NCE/MILE|AGE * GA|
|00000ba0| 4c 27 43 4f 53 54 65 60 | 61 05 dc 28 5f 03 1f 50 |L'COSTe`|a..(_..P|
|00000bb0| 52 49 4e 54 20 22 54 52 | 49 50 20 43 4f 53 54 20 |RINT "TR|IP COST |
|00000bc0| 3d 20 24 22 2c 54 52 49 | 50 27 43 4f 53 54 65 60 |= $",TRI|P'COSTe`|
|00000bd0| 61 05 e6 06 5f 60 61 05 | f0 0a ff 1e 02 00 0f ff |a..._`a.|........|
|00000be0| 1f 05 fa 05 7d 35 00 00 | 00 00 00 00 00 00 00 00 |....}5..|........|
|00000bf0| 10 ee af 00 00 14 69 8a | 00 00 00 00 00 00 00 00 |......i.|........|
|00000c00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 12 f3 af |........|........|
|00000c20| 00 00 10 e9 af 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c30| 00 14 8d 8a 00 00 14 c5 | 89 00 00 14 4b 8b 00 00 |........|....K...|
|00000c40| 14 4c 8a 00 00 00 00 00 | 00 00 14 c3 8c 00 00 14 |.L......|........|
|00000c50| 36 8f 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |6.......|........|
|00000c60| 00 00 00 14 2d 8b 00 00 | 00 00 00 00 00 00 00 00 |....-...|........|
|00000c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 14 69 91 00 |........|.....i..|
|00000c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cd0| 00 14 d7 93 00 00 14 30 | 94 00 00 00 00 00 00 00 |.......0|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 14 86 94 00 00 03 |........|........|
|00000cf0| 43 4c 53 04 4c 49 4e 45 | 08 42 4f 52 44 45 52 43 |CLS.LINE|.BORDERC|
|00000d00| 4f 04 57 41 49 54 05 44 | 45 4c 41 59 0b 53 43 52 |O.WAIT.D|ELAY.SCR|
|00000d10| 45 45 4e 43 4f 4c 4f 52 | 0c 42 41 43 4b 47 52 4f |EENCOLOR|.BACKGRO|
|00000d20| 55 4e 44 43 4f 06 43 48 | 41 4e 47 45 08 43 4f 4e |UNDCO.CH|ANGE.CON|
|00000d30| 54 49 4e 55 45 04 47 45 | 54 41 03 47 45 54 01 41 |TINUE.GE|TA.GET.A|
|00000d40| 0a 53 48 49 46 54 27 46 | 4c 41 47 06 46 4f 52 4d |.SHIFT'F|LAG.FORM|
|00000d50| 41 54 05 45 52 52 4f 52 | 0a 53 48 49 46 54 27 57 |AT.ERROR|.SHIFT'W|
|00000d60| 41 49 54 05 49 4e 54 52 | 4f 07 50 41 47 45 4f 4e |AIT.INTR|O.PAGEON|
|00000d70| 45 04 50 41 47 45 03 54 | 57 4f 07 50 41 47 45 54 |E.PAGE.T|WO.PAGET|
|00000d80| 57 4f 09 50 41 47 45 54 | 48 52 45 45 08 50 41 47 |WO.PAGET|HREE.PAG|
|00000d90| 45 46 4f 55 52 08 50 41 | 47 45 46 49 56 45 07 50 |EFOUR.PA|GEFIVE.P|
|00000da0| 41 47 45 53 49 58 04 4d | 45 4e 55 03 4c 49 54 04 |AGESIX.M|ENU.LIT.|
|00000db0| 43 48 41 52 02 44 45 02 | 41 54 07 53 55 4d 4d 41 |CHAR.DE.|AT.SUMMA|
|00000dc0| 52 59 06 43 48 4f 49 43 | 45 06 53 45 43 4f 4e 44 |RY.CHOIC|E.SECOND|
|00000dd0| 02 49 53 03 54 48 45 05 | 46 49 52 53 54 05 54 48 |.IS.THE.|FIRST.TH|
|00000de0| 49 52 44 03 4f 41 44 05 | 4c 4c 49 53 54 06 52 45 |IRD.OAD.|LLIST.RE|
|00000df0| 4e 55 4e 4d 05 52 45 4e | 55 4e 08 44 49 53 54 41 |NUNM.REN|UN.DISTA|
|00000e00| 4e 43 45 07 4d 49 4c 45 | 41 47 45 08 47 41 4c 27 |NCE.MILE|AGE.GAL'|
|00000e10| 43 4f 53 54 09 54 52 49 | 50 27 43 4f 53 54 05 43 |COST.TRI|P'COST.C|
|00000e20| 4f 55 4e 54 03 41 47 45 | 07 47 45 54 27 52 55 4e |OUNT.AGE|.GET'RUN|
|00000e30| 08 47 45 54 27 4c 49 53 | 54 04 45 44 54 49 03 4c |.GET'LIS|T.EDTI.L|
|00000e40| 53 54 16 56 41 52 49 41 | 42 4c 45 27 41 53 53 49 |ST.VARIA|BLE'ASSI|
|00000e50| 47 4e 4d 45 4e 54 53 27 | 31 15 56 41 52 49 41 42 |GNMENTS'|1.VARIAB|
|00000e60| 4c 45 27 41 53 53 49 47 | 4e 4d 45 4e 54 27 31 00 |LE'ASSIG|NMENT'1.|
|00000e70| 00                      |                         |.       |        |
+--------+-------------------------+-------------------------+--------+--------+